unit BaseControl;

interface

uses Controls;

type
  TBaseControl = class(TWinControl)
  published
    property OnEnter;
    property Color;
    property PopupMenu;
  end;

implementation

end.
